From fa35bb3ba0ff6862bc326bdd20e955eaa0768e15 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 16 Nov 2007 16:05:07 +0000 Subject: [PATCH] (rmail-current-subject-regexp): Allow more than one space after "Subject:". --- lisp/mail/rmail.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 30731c2bea9..0dd65f5191a 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -3281,7 +3281,9 @@ and more whitespace. The returned regular expressions contains (setq subject (regexp-quote subject)) (setq subject (replace-regexp-in-string "[ \t\n]+" "[ \t\n]+" subject t t)) - (concat "^Subject: " + ;; Some mailers insert extra spaces after "Subject:", so allow any + ;; amount of them. + (concat "^Subject:[ \t]+" (if (string= "\\`" (substring rmail-reply-regexp 0 2)) (substring rmail-reply-regexp 2) rmail-reply-regexp) -- 2.30.2